Mobiclic 48/MOBICLIC 48.ISO/pc/DATA/COMMUNS/AIDE.DIR/00012_Script_roll-over

Text File | 2002-08-13 | 485b | 28 lines

--RollOver par echange
property numero, LaPiste, LeNom
on beginSprite me
  numero = me.spriteNum
  LaPiste = sprite(numero)
  LeNom = LaPiste.member.name
end
-------
on MouseEnter
  if the pauseState = 1 then exit
  cursor 280
  LaPiste.member = LeNom&"_Roll"
  updateStage
end
-------
on mouseLeave
  if the pauseState = 1 then exit
  cursor -1
  puppetSprite numero,false
end


on mouseUp
  if the pauseState = 1 then exit
  sound close 3
  go LeNom
end